home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 2.iso / mac / data / Nuttall.dir / 00019_Script_GoCdxCdx (nums) < prev    next >
Text File  |  2001-01-30  |  584b  |  23 lines
  1. --on mouseUp
  2. --  cursor 4
  3. --  set mseChar = the mouseChar
  4. --  set mseWord = the mouseWord
  5. --  set fldNum = the castNum of sprite (the clickOn)
  6. --  if char mseChar of field fldNum <> " " then
  7. --    go "n"&(word mseWord of field fldNum)&",0"
  8. --    setTextRow
  9. --  end if
  10. --  cursor 0
  11. --end
  12. on mouseUp
  13.   cursor 4
  14.   tempList = [14,15,16,17,18,"19a","19b",20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35]
  15.   mLeft = the left of sprite 50
  16.   x = float(the mouseH - mLeft)
  17.   y = 23 - integer(x/28)
  18.   put y
  19.   z= tempList[y]
  20.   goto "n" & z & ",0"
  21.   setTextRow
  22.   cursor 0
  23. end